Great Canadian Scientists/GCS_CD.iso/mac/PC/GCSData/databa_o.dxr/00053_Set DB Font Size.ls

Text File | 1996-09-21 | 239 b | 12 lines

on SetDBFontSize
  if the machineType <> 256 then
    exit
  end if
  repeat with count = 171 to 247
    set Temp to the name of cast count
    if Temp <> EMPTY then
      set the textSize of member count to 12
    end if
  end repeat
end